object DMReport: TDMReport
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  OnDestroy = DataModuleDestroy
  Left = 647
  Top = 375
  Height = 528
  Width = 507
  object dsGetReportFile: TpFIBDataSet
    SelectSQL.Strings = (
      'select report, repsrv'
      'from userreport'
      'where code = :report_id')
    Transaction = trReport
    Database = dbReport
    Left = 168
    Top = 338
    object dsGetReportFileREPORT: TFIBBlobField
      FieldName = 'REPORT'
      Size = 8
    end
    object dsGetReportFileREPSRV: TFIBSmallIntField
      FieldName = 'REPSRV'
    end
  end
  object dscReportsList: TDataSource
    DataSet = dsModuleReports
    Left = 236
    Top = 280
  end
  object frxReport: TfrxReport
    Version = '4.8.53'
    DotMatrixReport = False
    EngineOptions.ConvertNulls = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = #1055#1086' '#1091#1084#1086#1083#1095#1072#1085#1080#1102
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 38264.508156284700000000
    ReportOptions.LastChange = 39438.735546782410000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'var'
      ' SaldoStart:real;'
      ''
      'procedure Page1OnBeforePrint(Sender:TfrxComponent);'
      'begin'
      '  SaldoStart := 0;'
      '  if (not(<FPay_Period> > 0)) then begin'
      '    Memo68.Visible := false;'
      '    Memo6.Visible := false;'
      '    Memo13.Visible := false;'
      '    Memo24.Visible := false;'
      '    Memo14.Visible := false;'
      '    Memo69.Visible := false;'
      '    Memo10.Visible := false;'
      '    Memo15.Visible := false;'
      '    Memo25.Visible := false;'
      '    Memo16.Visible := false;'
      '    Memo70.Visible := false;'
      '    Memo18.Visible := false;'
      '    Memo23.Visible := false;'
      '    Memo20.Visible := false;'
      '    Memo37.Visible := false;'
      '    Memo38.Visible := false;'
      '    Memo39.Visible := false;'
      '        '
      '    Memo_SumSubsidy.Visible := false;'
      ''
      '    Memo35.Left := Memo38.Left;'
      '    Oplata.Left := Memo38.Left;'
      '    SOplata.Left := Memo38.Left;'
      ''
      '    Memo11.Left := Memo38.Left + Memo35.Width;'
      '    Memo9.Left := Memo38.Left + Memo35.Width;'
      '    Memo12.Left := Memo38.Left + Memo35.Width;'
      '//   Memotst.Left := Memo11.Left + Memo11.Width;'
      '  end;'
      ''
      '{  QDogovor.Open;'
      '  if(QDogovor.Locate('#39'RGROUP_ID'#39', 14, 0)) then begin'
      '    if (QDogovor.FieldByName('#39'RSubsidy'#39').AsFloat >= 0.01)then'
      
        '      SEL2.Text := '#39#1057#1059#1041#1057#1048#1044#1048#1071' '#1055#1054' '#1069#1051#1045#1050#1058#1056#1054#1069#1053#1045#1056#1043#1048#1048': '#39' + QDogovor.Fie' +
        'ldByName('#39'RSubsidy'#39').AsString;'
      '    end;'
      ''
      '  QDogovor.First;'
      '  While (not QDogovor.Eof) do begin'
      
        '    SaldoStart := SaldoStart + QDogovor.FieldByName('#39'RSTARTSALDO' +
        #39').AsFloat;'
      '    QDogovor.Next;'
      '  end;'
      ' }  '
      '  if (SaldoStart > 0.0) then SaldoStart := 0.0'
      '  else SaldoStart := -SaldoStart;'
      'end;'
      ''
      'procedure MasterData1OnBeforePrint(Sender :TfrxComponent);'
      'begin'
      '{  if (<QDogovor."RSHOW"> = 1) then begin'
      '    Memo68.Height := 18.90;'
      '    Memo6.Height := 18.90;'
      '    Memo13.Height := 18.90;'
      '    Memo24.Height := 18.90;'
      '    Memo14.Height := 18.90;'
      '    Memo21.Height := 18.90;'
      '    Memo10.Height := 18.90;'
      '    Memo37.Height := 18.90;'
      '    Memo4.Height := 18.90;'
      '    Memo9.Height := 18.90;'
      '    Oplata.Height := 18.90;'
      '  end'
      '  else begin'
      '    Memo37.Height := 0;'
      '    Memo68.Height := 0;'
      '    Memo6.Height := 0;'
      '    Memo13.Height := 0;'
      '    Memo24.Height := 0;'
      '    Memo14.Height := 0;'
      '    Memo21.Height := 0;'
      '    Memo10.Height := 0;'
      '    Memo4.Height := 0;'
      '    Memo9.Height := 0;'
      '    Oplata.Height := 0;'
      '  end;}  '
      ''
      '  if (<QAgentComiss."OPER_SUM"> < 0) then begin'
      '    SEL.Height := 0;'
      '  end;'
      'end;'
      ''
      'begin'
      ' QTenants.open;'
      'end.')
    Left = 160
    Top = 102
    Datasets = <
      item
        DataSet = frxReport.QAbon
        DataSetName = 'QAbon'
      end
      item
        DataSet = frxReport.QDogovor
        DataSetName = 'QDogovor'
      end
      item
        DataSet = frxReport.QNameK
        DataSetName = 'QNameK'
      end
      item
        DataSet = frxReport.QTenants
        DataSetName = 'QTenants'
      end
      item
        DataSet = frxReport.QPeni
        DataSetName = 'QPeni'
      end
      item
        DataSet = frxReport.QAgentComiss
        DataSetName = 'QAgentComiss'
      end>
    Variables = <
      item
        Name = 'FName_1'
        Value = #39#1057#1054' '#1056#1040#1053#39
      end
      item
        Name = 'FName_2'
        Value = #39#1056#1091#1082'. '#1075#1088#1091#1087#1087#1099' '#1054#1056#1055#39
      end
      item
        Name = 'FName_3'
        Value = #39#39
      end
      item
        Name = 'FName_4'
        Value = #39#39
      end
      item
        Name = 'FOrgCode'
        Value = '1'
      end
      item
        Name = 'FAbonID'
        Value = '222218'
      end
      item
        Name = 'FCLientID'
        Value = '20365'
      end
      item
        Name = 'FReciept'
        Value = '0'
      end
      item
        Name = 'FDogovorID'
        Value = '72131'
      end
      item
        Name = 'FPay_Period'
        Value = '0'
      end
      item
        Name = 'FDocumentID'
        Value = '50'
      end>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
      object QAbon: TfrxFIBQuery
        UserName = 'QAbon'
        CloseDataSource = True
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <
          item
            Name = 'PABON_ID'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end
          item
            Name = 'PDATE'
            DataType = ftDate
            Expression = '<FPay_Period>'
          end>
        SQL.Strings = (
          'SELECT'
          '    RNLS,'
          '    RNAME,'
          '    RTENANTSCOUNT,'
          '    REXTENANTSCOUNT,'
          '    RPHONE,'
          '    RSTREET,'
          '    RHOUSE,'
          '    RAPPARTS,'
          '    RTMPOUT,'
          '    RTMPIN,'
          '    RQFULLSPACE,'
          '    RQLIVESPACE,'
          '    RQADDSPACE,'
          '    RQSOC,'
          '    RQSOC_M,'
          '    RQSOCADD,'
          '    RQBALKON,'
          '    RHEIGHT,'
          '    RCOEFHEATING,'
          '    RMATCOEF,'
          '    RBUILDWEARCOEF,'
          '    RSALDO,'
          '    REALTYNAME,'
          '    ROWNERSHIPNAME,'
          '    RZKXNAME,'
          '    REXNAME,'
          '    RADRCASSA'
          'FROM'
          '    REP_ABONENT_BY_DATE(:PABON_ID,'
          '    lastdaymonth(:PDATE))')
        pLeft = 60
        pTop = 20
        Parameters = <
          item
            Name = 'PABON_ID'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end
          item
            Name = 'PDATE'
            DataType = ftDate
            Expression = '<FPay_Period>'
          end>
      end
      object QNameK: TfrxFIBQuery
        UserName = 'QNameK'
        CloseDataSource = True
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <>
        SQL.Strings = (
          'SELECT * FROM  USER_GETNAME ')
        pLeft = 124
        pTop = 20
        Parameters = <>
      end
      object QDogovor: TfrxFIBQuery
        UserName = 'QDogovor'
        CloseDataSource = True
        FieldAliases.Strings = (
          'RSERVICE=RSERVICE'
          'RSTARTSALDO=RSTARTSALDO'
          'RCHARGE=RCHARGE'
          'REXEMPTS=REXEMPTS'
          'RREPAY=RREPAY'
          'RSALDO=RSALDO'
          'RPAYSUMM=RPAYSUMM'
          'RSUBSIDY=RSUBSIDY'
          'RUNIT=RUNIT'
          'RDOGOVOR_ID=RDOGOVOR_ID'
          'RDOLG=RDOLG'
          'RGROUP_ID=RGROUP_ID'
          'RCHARGE_DATE=RCHARGE_DATE'
          'RCALCTYPE=RCALCTYPE'
          'RPENI=RPENI'
          'RSHOW=RSHOW'
          'ROPLATA=ROPLATA'
          'RMETERPOLIT=RMETERPOLIT'
          'TARIFF=TARIFF')
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <
          item
            Name = 'PDATE'
            DataType = ftDate
            Expression = '<FPay_Period>'
          end
          item
            Name = 'PABONENT_ID'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end
          item
            Name = 'PRECIEPT'
            DataType = ftInteger
            Expression = '<FReciept>'
          end>
        SQL.Strings = (
          'SELECT r.*,     '
          '  (case when r.rshow = 1 then'
          
            '    (select first(1) p.rtariff from proc_meter_calc_tariff (r.rd' +
            'ogovor_id, current_date, null, null, null) p)'
          '    else null end) as tariff'
          'FROM REP_BERDSK_KVIT'
          '   (:PDATE,'
          '    :PABONENT_ID,'
          '    :PRECIEPT) r         '
          '--order by RSERVICE')
        pLeft = 188
        pTop = 20
        Parameters = <
          item
            Name = 'PDATE'
            DataType = ftDate
            Expression = '<FPay_Period>'
          end
          item
            Name = 'PABONENT_ID'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end
          item
            Name = 'PRECIEPT'
            DataType = ftInteger
            Expression = '<FReciept>'
          end>
      end
      object QTenants: TfrxFIBQuery
        UserName = 'QTenants'
        CloseDataSource = True
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <
          item
            Name = 'abon_id'
            DataType = ftUnknown
            Expression = '<FAbonID>'
          end>
        SQL.Strings = (
          'select * from REP_M_LGOTERS_TENANTS(:abon_id, null, null)')
        pLeft = 252
        pTop = 20
        Parameters = <
          item
            Name = 'abon_id'
            DataType = ftUnknown
            Expression = '<FAbonID>'
          end>
      end
      object QPeni: TfrxFIBQuery
        UserName = 'QPeni'
        CloseDataSource = True
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <
          item
            Name = 'pabonent_id'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end>
        SQL.Strings = (
          'select round(sum(peni), 2) as rpeni from dogovors'
          'where abonent_id = :pabonent_id')
        pLeft = 316
        pTop = 20
        Parameters = <
          item
            Name = 'pabonent_id'
            DataType = ftInteger
            Expression = '<FAbonID>'
          end>
      end
      object QAgentComiss: TfrxFIBQuery
        UserName = 'QAgentComiss'
        CloseDataSource = True
        FieldAliases.Strings = (
          'SUMM_ALL=SUMM_ALL'
          'AGENT_SUM=AGENT_SUM'
          'OPER_SUM=OPER_SUM')
        BCDToCurrency = False
        IgnoreDupParams = False
        Params = <
          item
            Name = 'preciept'
            DataType = ftString
            Expression = '<FReciept>'
          end>
        SQL.Strings = (
          
            'select sum(ac.supp_summ) as summ_all, sum(ac.tranz_comiss) as ag' +
            'ent_sum, sum(ac.oper_comiss) as oper_sum'
          '  from agents_comiss ac, reciepts r'
          '  where ac.reciept_id = r.id'
          '    and r.reciept = :preciept')
        pLeft = 380
        pTop = 20
        Parameters = <
          item
            Name = 'preciept'
            DataType = ftString
            Expression = '<FReciept>'
          end>
      end
    end
    object Page1: TfrxReportPage
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 5.000000000000000000
      RightMargin = 4.000000000000000000
      TopMargin = 5.000000000000000000
      BottomMargin = 10.000000000000000000
      ColumnWidth = 190.000000000000000000
      ColumnPositions.Strings = (
        '0')
      HGuides.Strings = (
        '18,89765')
      VGuides.Strings = (
        '3,77953')
      OnBeforePrint = 'Page1OnBeforePrint'
      object ReportTitle1: TfrxReportTitle
        Font.Charset = RUSSIAN_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Fixedsys'
        Font.Style = []
        Height = 123.779530000000000000
        ParentFont = False
        Top = 16.000000000000000000
        Width = 759.685530000000000000
        Stretched = True
        object Memo47: TfrxMemoView
          ShiftMode = smDontShift
          Left = 115.779530000000000000
          Top = 71.811070000000000000
          Width = 309.921460000000000000
          Height = 34.015757800000000000
          ShowHint = False
          DataSet = frxReport.QAbon
          DataSetName = 'QAbon'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          LineSpacing = 5.000000000000000000
          Memo.UTF8 = (
            
              '[QAbon."RNLS"] '#1057#1107#1056#187'. [<QAbon."RSTREET">], [<QAbon."RHOUSE">] '#1056#1108#1056 +
              #1030'. [<QAbon."RAPPARTS">]'
            '[<QAbon."RNAME">]')
          ParentFont = False
          WordWrap = False
        end
        object Memo52: TfrxMemoView
          ShiftMode = smDontShift
          Left = 115.779530000000000000
          Top = 47.897650000000000000
          Width = 306.976500000000000000
          Height = 15.897637800000000000
          ShowHint = False
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = 'mmmm'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            
              #1056#1113#1056#8217#1056#152#1056#1118#1056#1106#1056#1116#1056#166#1056#152#1056#1031' [iif(<FPay_Period> = 0, '#39' '#1056#1109#1056#1111#1056#187#1056#176#1057#8218#1057#8249' '#1057#1027#1056#176#1056#187 +
              #1057#1034#1056#1169#1056#1109#39', '#39' '#1056#183#1056#176' '#39' + FormatDateTime('#39'MMMM'#39',<FPay_Period>) + '#39' '#1056#1112#1056 +
              #181#1057#1027#1057#1039#1057#8224#39')] [iif(<FPay_Period> = 0, '#39#39', IntToStr(YearOf(<FPay_Per' +
              'iod>))+'#39' '#1056#1110#1056#1109#1056#1169#1056#176#39')]')
          ParentFont = False
          WordWrap = False
        end
        object Memo54: TfrxMemoView
          ShiftMode = smDontShift
          Left = 115.779530000000000000
          Top = 31.590575590000000000
          Width = 306.141930000000000000
          Height = 15.897637800000000000
          ShowHint = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haCenter
          Memo.UTF8 = (
            '[QAbon."RADRCASSA"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo67: TfrxMemoView
          ShiftMode = smDontShift
          Left = 438.425480000000000000
          Top = 46.897650000000000000
          Width = 319.260050000000000000
          Height = 63.370130000000000000
          ShowHint = False
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          LineSpacing = 5.000000000000000000
          Memo.UTF8 = (
            #1056#1113#1056#1109#1057#1036#1057#8222'. '#1056#1105#1056#183#1056#1029#1056#1109#1057#1027#1056#176': [QAbon."RBUILDWEARCOEF"]   '
            #1056#1113#1056#1109#1057#1036#1057#8222'. '#1057#1027#1057#8218#1056#181#1056#1029': [QAbon."RMATCOEF"]   '
            #1056#1113#1056#1109#1057#1036#1057#8222'. '#1056#1109#1057#8218#1056#1109#1056#1111#1056#187#1056#181#1056#1029#1056#1105#1057#1039': [QAbon."RCOEFHEATING"]'
            
              #1056#1119#1056#187#1056#1109#1057#8240#1056#176#1056#1169#1057#1034' - [QAbon."RQFULLSPACE"] + [QAbon."RQADDSPACE"] + ' +
              #1056#177#1056#176#1056#187#1056#1108#1056#1109#1056#1029' [QAbon."RQBALKON"] '#1057#1027#1056#1109#1057#8224'.'#1056#1029#1056#1109#1057#1026#1056#1112#1056#176' [iif(<QAbon."R' +
              'QSOC_M"> > <QAbon."RQFULLSPACE">, <QAbon."RQFULLSPACE">, <QAbon.' +
              '"RQSOC_M">)] '#1056#1112'2')
          ParentFont = False
          WordWrap = False
        end
        object Memo48: TfrxMemoView
          ShiftMode = smDontShift
          Left = 115.779530000000000000
          Width = 444.897405910000000000
          Height = 29.897637800000000000
          ShowHint = False
          DataSet = frxReport.QNameK
          DataSetName = 'QNameK'
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = 'dd.mm.yyyy'
          DisplayFormat.Kind = fkDateTime
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          LineSpacing = 5.000000000000000000
          Memo.UTF8 = (
            #1056#1108#1056#176#1057#1027#1057#1027#1056#1105#1057#1026' [QNameK."RNAME"] - [QNameK."RNAMEORG"]  [Now]'
            #1056#152#1056#1116#1056#1116' 5445123239 '#1056#1118#1056#1038#1056#8211' '#1056#1038#1056#181#1056#1030#1056#181#1057#1026#1056#1029#1057#8249#1056#8470'-256')
          ParentFont = False
          WordWrap = False
        end
        object BarCode1: TfrxBarCodeView
          Left = 11.338590000000000000
          Width = 96.204700000000000000
          Height = 120.000000000000000000
          ShowHint = False
          BarType = bcCode_2_5_interleaved
          DataField = 'RNLS'
          DataSet = frxReport.QAbon
          DataSetName = 'QAbon'
          Expression = '12345678'
          Rotation = 90
          Text = '1234567890123456'
          WideBarRatio = 2.000000000000000000
          Zoom = 1.000000000000000000
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = []
        end
        object Memo32: TfrxMemoView
          ShiftMode = smDontShift
          Left = 438.425480000000000000
          Top = 30.590575590000000000
          Width = 319.141930000000000000
          Height = 16.118107800000000000
          ShowHint = False
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = '%2.0n'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            
              #1056#1113#1056#8211': [QAbon."RTENANTSCOUNT"]  '#1056#8217#1056#1032': [QAbon."RTMPOUT"]  '#1056#8217#1056#8212': [Q' +
              'Abon."RTMPIN"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo34: TfrxMemoView
          Left = 574.488560000000000000
          Width = 151.181200000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -8
          Font.Name = 'Fixedsys'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8 = (
            
              '[iif(Length(VarToStr(<FReciept>)) > 1, '#39#1057#8225#1056#181#1056#1108' '#1074#8222#8211' '#39' + VarToStr(' +
              '<FReciept>), '#39#39')]')
          ParentFont = False
        end
      end
      object MasterData4: TfrxMasterData
        Height = 18.897637800000000000
        Top = 200.000000000000000000
        Width = 759.685530000000000000
        DataSet = frxReport.QDogovor
        DataSetName = 'QDogovor'
        RowCount = 0
        object Subreport1: TfrxSubreport
          ShiftMode = smDontShift
          Left = 3.779530000000000000
          Width = 368.953000000000000000
          Height = 18.897637800000000000
          ShowHint = False
          Page = frxReport.Page2
          PrintOnParent = True
        end
      end
      object MasterData3: TfrxMasterData
        Height = 18.897650000000000000
        Top = 160.000000000000000000
        Width = 759.685530000000000000
        DataSet = frxReport.QTenants
        DataSetName = 'QTenants'
        RowCount = 0
        object Subreport2: TfrxSubreport
          Left = 3.779530000000000000
          Width = 370.393940000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Page = frxReport.Page3
        end
      end
    end
    object Page2: TfrxReportPage
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 5.000000000000000000
      RightMargin = 4.000000000000000000
      TopMargin = 5.000000000000000000
      BottomMargin = 10.000000000000000000
      ColumnWidth = 190.000000000000000000
      ColumnPositions.Strings = (
        '0')
      OnAfterPrint = 'Page2OnAfterPrint'
      object MasterData1: TfrxMasterData
        Height = 15.897650000000000000
        Top = 68.031540000000000000
        Width = 759.685530000000000000
        OnBeforePrint = 'MasterData1OnBeforePrint'
        ColumnWidth = 359.055118110236000000
        ColumnGap = 18.897637795275600000
        DataSet = frxReport.QDogovor
        DataSetName = 'QDogovor'
        KeepChild = True
        KeepFooter = True
        KeepTogether = True
        RowCount = 0
        Stretched = True
        object Memo4: TfrxMemoView
          ShiftMode = smDontShift
          Width = 208.700853310000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."RSERVICE"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo6: TfrxMemoView
          ShiftMode = smDontShift
          Left = 361.086753310000000000
          Width = 45.354330710000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."REXEMPTS"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo13: TfrxMemoView
          ShiftMode = smDontShift
          Left = 406.472653310000000000
          Width = 56.692920710000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[iif(<QDogovor."RCHARGE"> > 0, <QDogovor."RSUBSIDY">, 0)]')
          ParentFont = False
          WordWrap = False
        end
        object Memo14: TfrxMemoView
          ShiftMode = smDontShift
          Left = 519.811243310000000000
          Width = 45.354330710000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."ROPLATA"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo21: TfrxMemoView
          ShiftMode = smDontShift
          Left = 208.700853310000000000
          Width = 43.913420000000000000
          Height = 15.897650000000000000
          Visible = False
          ShowHint = False
          DataField = 'RUNIT'
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."RUNIT"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo24: TfrxMemoView
          ShiftMode = smDontShift
          Left = 463.181373310000000000
          Width = 56.692920710000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."RREPAY"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo68: TfrxMemoView
          ShiftMode = smDontShift
          Left = 316.330860000000000000
          Width = 45.354330710000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."RCHARGE"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo9: TfrxMemoView
          ShiftMode = smDontShift
          Left = 626.724800000000000000
          Width = 61.299183310000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."RPAYSUMM"]')
          ParentFont = False
          WordWrap = False
        end
        object Oplata: TfrxMemoView
          ShiftMode = smDontShift
          Left = 565.590910000000000000
          Width = 61.228346460000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataField = 'ROPLATA'
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."ROPLATA"]')
          ParentFont = False
          WordWrap = False
        end
        object Memo37: TfrxMemoView
          ShiftMode = smDontShift
          Left = 253.228510000000000000
          Width = 61.299183310000000000
          Height = 15.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          HAlign = haRight
          LineSpacing = 1.000000000000000000
          Memo.UTF8 = (
            '[QDogovor."TARIFF"]')
          ParentFont = False
          WordWrap = False
        end
      end
      object Header1: TfrxHeader
        Height = 28.015770000000000000
        Top = 18.897650000000000000
        Width = 759.685530000000000000
        Stretched = True
        object Memo8: TfrxMemoView
          ShiftMode = smDontShift
          Width = 208.700853310000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1032#1057#1027#1056#187#1057#1107#1056#1110#1056#176)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo10: TfrxMemoView
          ShiftMode = smDontShift
          Left = 361.086753310000000000
          Width = 45.354330710000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1116#1056#176#1057#8225#1056#1105#1057#1027#1056#187
            ' '#1057#8222#1056#176#1056#1108#1057#8218'.')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo15: TfrxMemoView
          ShiftMode = smDontShift
          Left = 406.472653310000000000
          Width = 56.692920710000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1038#1057#1107#1056#177#1057#1027#1056#1105#1056#1169#1056#1105#1057#1039)
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo16: TfrxMemoView
          ShiftMode = smDontShift
          Left = 519.811243310000000000
          Width = 45.354330710000000000
          Height = 28.236240000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#152#1057#8218#1056#1109#1056#1110#1056#1109
            #1056#1029#1056#176#1057#8225#1056#1105#1057#1027#1056#187)
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo22: TfrxMemoView
          ShiftMode = smDontShift
          Left = 208.700853310000000000
          Width = 43.913420000000000000
          Height = 28.236240000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo25: TfrxMemoView
          ShiftMode = smDontShift
          Left = 463.181373310000000000
          Width = 56.692920710000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1030#1056#1109#1056#183#1056#1030#1057#1026#1056#176#1057#8218#1057#8249)
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo69: TfrxMemoView
          ShiftMode = smDontShift
          Left = 316.330860000000000000
          Width = 45.354330710000000000
          Height = 28.236240000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1116#1056#176#1057#8225#1056#1105#1057#1027#1056#187
            ' '#1057#8218#1056#176#1057#1026#1056#1105#1057#8222'.')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo35: TfrxMemoView
          ShiftMode = smDontShift
          Left = 565.590910000000000000
          Width = 61.228346460000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1113' '#1056#1109#1056#1111#1056#187#1056#176#1057#8218#1056#181)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo11: TfrxMemoView
          ShiftMode = smDontShift
          Left = 626.724800000000000000
          Width = 62.740123310000000000
          Height = 28.236240000000000000
          ShowHint = False
          AllowExpressions = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1115#1056#1111#1056#187#1056#176#1057#8225#1056#181#1056#1029#1056#1109)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo38: TfrxMemoView
          ShiftMode = smDontShift
          Left = 253.228510000000000000
          Width = 62.740123310000000000
          Height = 28.236240000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = ','
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1118#1056#181#1056#1108#1057#1107#1057#8240#1056#1105#1056#8470' '#1057#8218#1056#176#1057#1026#1056#1105#1057#8222)
          ParentFont = False
          VAlign = vaCenter
        end
      end
      object Footer1: TfrxFooter
        Height = 156.181200000000000000
        Top = 105.826840000000000000
        Width = 759.685530000000000000
        object Memo7: TfrxMemoView
          ShiftMode = smDontShift
          Top = 3.779529999999980000
          Width = 208.700853310000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            #1056#152#1057#8218#1056#1109#1056#1110#1056#1109)
          ParentFont = False
        end
        object Memo18: TfrxMemoView
          ShiftMode = smDontShift
          Left = 361.086753310000000000
          Top = 3.779529999999980000
          Width = 45.354330710000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."REXEMPTS">)]')
          ParentFont = False
          WordWrap = False
        end
        object Memo_SumSubsidy: TfrxMemoView
          ShiftMode = smDontShift
          Left = 406.472653310000000000
          Top = 3.779529999999980000
          Width = 56.692920710000000000
          Height = 18.897650000000000000
          OnAfterPrint = 'Memo19OnAfterPrint'
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(iif(<QDogovor."RCHARGE"> > 0, <QDogovor."Rsubsidy">, 0))]')
          ParentFont = False
          WordWrap = False
        end
        object Memo20: TfrxMemoView
          ShiftMode = smDontShift
          Left = 519.811243310000000000
          Top = 3.779529999999980000
          Width = 45.354330710000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."ROPLATA">)]')
          ParentFont = False
          WordWrap = False
        end
        object Memo23: TfrxMemoView
          ShiftMode = smDontShift
          Left = 463.181373310000000000
          Top = 3.779529999999980000
          Width = 56.692920710000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."Rrepay">)]')
          ParentFont = False
          WordWrap = False
        end
        object Memo26: TfrxMemoView
          ShiftMode = smDontShift
          Left = 1.338590000000000000
          Top = 46.795300000000000000
          Width = 366.614410000000000000
          Height = 18.897650000000000000
          Visible = False
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            #1056#8217#1056#1038#1056#8226#1056#8220#1056#1115' [SUM(<QDogovor."RDOLG">)]')
          ParentFont = False
          WordWrap = False
        end
        object Memo27: TfrxMemoView
          ShiftMode = smDontShift
          Left = 208.700853310000000000
          Top = 3.779529999999980000
          Width = 43.913420000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          ParentFont = False
          WordWrap = False
        end
        object Memo63: TfrxMemoView
          ShiftMode = smDontShift
          Top = 85.590600000000000000
          Width = 750.614410000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = 'dd.mm.yyyy'
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            
              '[iif(SUM(<QDogovor."RSALDO">) > 0, '#39#1056#1119#1056#181#1057#1026#1056#181#1056#1111#1056#187#1056#176#1057#8218#1056#176' '#1056#1111#1056#1109' '#1056#1108#1056#1030 +
              #1056#176#1057#1026#1057#8218#1056#1111#1056#187#1056#176#1057#8218#1056#181' '#1056#1029#1056#176' '#39', '#39#1056#1116#1056#181#1056#1169#1056#1109#1056#1111#1056#187#1056#176#1057#8218#1056#176' '#1056#1111#1056#1109' '#1056#1108#1056#1030#1056#176#1057#1026#1057#8218#1056#1111#1056#187 +
              #1056#176#1057#8218#1056#181' '#1056#1029#1056#176' '#39')][Date]:   [Abs(SUM(<QDogovor."RSALDO">))]')
          ParentFont = False
          WordWrap = False
        end
        object Memo65: TfrxMemoView
          ShiftMode = smDontShift
          Top = 67.598330000000000000
          Width = 52.614410000000000000
          Height = 17.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop]
          Memo.UTF8 = (
            #1056#1113' '#1056#1109#1056#1111#1056#187#1056#176#1057#8218#1056#181)
          ParentFont = False
          WordWrap = False
        end
        object Memo70: TfrxMemoView
          ShiftMode = smDontShift
          Left = 316.330860000000000000
          Top = 3.779530000000000000
          Width = 45.354330710000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."RCHARGE">)]')
          ParentFont = False
          WordWrap = False
        end
        object SOplata: TfrxMemoView
          ShiftMode = smDontShift
          Left = 565.590910000000000000
          Top = 3.779529999999980000
          Width = 61.228346460000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."ROPLATA">)]')
          ParentFont = False
        end
        object Memo12: TfrxMemoView
          ShiftMode = smDontShift
          Left = 626.724800000000000000
          Top = 3.779529999999980000
          Width = 61.299183310000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          Memo.UTF8 = (
            '[SUM(<QDogovor."RPAYSUMM">)]')
          ParentFont = False
        end
        object Memo17: TfrxMemoView
          Left = 370.393940000000000000
          Top = 67.488250000000000000
          Width = 60.472480000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            #1056#1115#1056#1111#1056#187#1056#176#1057#8225#1056#181#1056#1029#1056#1109)
          ParentFont = False
        end
        object ResMemo: TfrxMemoView
          ShiftMode = smDontShift
          Left = 52.000000000000000000
          Top = 67.598330000000000000
          Width = 316.614410000000000000
          Height = 17.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2m'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop]
          Memo.UTF8 = (
            '[SUM(<QDogovor."ROPLATA">)]')
          ParentFont = False
          WordWrap = False
        end
        object SEL: TfrxMemoView
          ShiftMode = smDontShift
          Left = 0.684910000000000000
          Top = 24.039270000000000000
          Width = 342.236550000000000000
          Height = 23.456710000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            
              '[iif(<QAgentComiss."AGENT_SUM"> <> 0, '#39#1056#1113#1056#1109#1056#1112#1056#1105#1057#1027#1057#1027#1056#1105#1057#1039' '#1056#176#1056#1110#1056#181#1056#1029 +
              #1057#8218#1056#176': '#39' + FloatToStr(<QAgentComiss."AGENT_SUM">), '#39#39')]')
          ParentFont = False
          WordWrap = False
        end
        object Memo33: TfrxMemoView
          ShiftMode = smDontShift
          Top = 104.936920000000000000
          Width = 750.614410000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            
              '[iif(<QPeni."RPENI"> <= -0.01, '#39#1056#8221#1056#1109#1056#187#1056#1110' '#1056#1111#1056#181#1056#1029#1056#1105' '#39'+FloatToStr(A' +
              'BS(<QPeni."RPENI">)), '#39#39')]')
          ParentFont = False
          WordWrap = False
        end
        object Memo36: TfrxMemoView
          Left = 430.866420000000000000
          Top = 68.031540000000000000
          Width = 321.260050000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = '%2.2m'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Memo.UTF8 = (
            '[SUM(<QDogovor."RPAYSUMM">)+<QAgentComiss."AGENT_SUM">]')
          ParentFont = False
        end
        object SEL2: TfrxMemoView
          ShiftMode = smDontShift
          Left = 349.000000000000000000
          Top = 24.000000000000000000
          Width = 342.236550000000000000
          Height = 23.456710000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          ParentFont = False
          WordWrap = False
        end
        object Memo39: TfrxMemoView
          ShiftMode = smDontShift
          Left = 253.228510000000000000
          Top = 3.779530000000000000
          Width = 61.299183310000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxReport.QDogovor
          DataSetName = 'QDogovor'
          DisplayFormat.DecimalSeparator = '.'
          DisplayFormat.FormatStr = '%2.2f'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftTop, ftBottom]
          HAlign = haRight
          ParentFont = False
        end
      end
    end
    object DialogPage1: TfrxDialogPage
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      Height = 121.000000000000000000
      ClientHeight = 94.000000000000000000
      Left = 538.000000000000000000
      Top = 255.000000000000000000
      Width = 236.000000000000000000
      ClientWidth = 228.000000000000000000
    end
    object Page3: TfrxReportPage
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 5.000000000000000000
      RightMargin = 4.000000000000000000
      TopMargin = 5.000000000000000000
      BottomMargin = 10.000000000000000000
      ColumnWidth = 190.000000000000000000
      ColumnPositions.Strings = (
        '0')
      object Header2: TfrxHeader
        Height = 36.000000000000000000
        Top = 16.000000000000000000
        Width = 759.685530000000000000
        PrintChildIfInvisible = True
        object Memo1: TfrxMemoView
          ShiftMode = smDontShift
          Width = 609.118120000000000000
          Height = 18.000000000000000000
          ShowHint = False
          AllowExpressions = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#8250#1057#1034#1056#1110#1056#1109#1057#8218#1056#1029#1056#1105#1056#1108#1056#1105)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo2: TfrxMemoView
          ShiftMode = smDontShift
          Top = 18.000000000000000000
          Width = 242.102350000000000000
          Height = 18.000000000000000000
          ShowHint = False
          AllowExpressions = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#164#1056#152#1056#1115)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo3: TfrxMemoView
          ShiftMode = smDontShift
          Left = 242.102350000000000000
          Top = 18.000000000000000000
          Width = 207.086580000000000000
          Height = 18.000000000000000000
          ShowHint = False
          AllowExpressions = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#8250#1057#1034#1056#1110#1056#1109#1057#8218#1056#176)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo5: TfrxMemoView
          ShiftMode = smDontShift
          Left = 449.000000000000000000
          Top = 18.000000000000000000
          Width = 80.000000000000000000
          Height = 18.000000000000000000
          ShowHint = False
          AllowExpressions = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1116#1056#176#1057#8225#1056#176#1056#187#1056#1109)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
        object Memo19: TfrxMemoView
          ShiftMode = smDontShift
          Left = 529.000000000000000000
          Top = 18.000000000000000000
          Width = 80.000000000000000000
          Height = 18.000000000000000000
          ShowHint = False
          AllowExpressions = False
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = [fsBold]
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HAlign = haCenter
          Memo.UTF8 = (
            #1056#1113#1056#1109#1056#1029#1056#181#1057#8224)
          ParentFont = False
          WordWrap = False
          VAlign = vaCenter
        end
      end
      object MasterData2: TfrxMasterData
        Height = 16.874018190000000000
        Top = 72.000000000000000000
        Width = 759.685530000000000000
        Columns = 1
        ColumnWidth = 200.000000000000000000
        ColumnGap = 20.000000000000000000
        DataSet = frxReport.QTenants
        DataSetName = 'QTenants'
        RowCount = 0
        Stretched = True
        object Memo28: TfrxMemoView
          ShiftMode = smDontShift
          Width = 242.102350000000000000
          Height = 16.874018190000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8 = (
            '[QTenants."NAME"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo29: TfrxMemoView
          ShiftMode = smDontShift
          Left = 242.102350000000000000
          Width = 207.086580000000000000
          Height = 16.874018190000000000
          ShowHint = False
          StretchMode = smMaxHeight
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8 = (
            '[QTenants."EXNAME"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo30: TfrxMemoView
          ShiftMode = smDontShift
          Left = 449.000000000000000000
          Width = 80.000000000000000000
          Height = 16.874018190000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = 'dd.mm.yyyy'
          DisplayFormat.Kind = fkDateTime
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.UTF8 = (
            '[QTenants."EXBDATE"]')
          ParentFont = False
          VAlign = vaCenter
        end
        object Memo31: TfrxMemoView
          ShiftMode = smDontShift
          Left = 529.000000000000000000
          Width = 80.000000000000000000
          Height = 16.874018190000000000
          ShowHint = False
          StretchMode = smMaxHeight
          DisplayFormat.DecimalSeparator = ','
          DisplayFormat.FormatStr = 'dd.mm.yyyy'
          DisplayFormat.Kind = fkDateTime
          Font.Charset = RUSSIAN_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'System'
          Font.Style = []
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          HideZeros = True
          Memo.UTF8 = (
            '[QTenants."EXEDATE"]')
          ParentFont = False
          VAlign = vaCenter
        end
      end
      object Footer2: TfrxFooter
        Height = 11.338590000000000000
        Top = 108.000000000000000000
        Width = 759.685530000000000000
      end
    end
  end
  object frxFIBComponents: TfrxFIBComponents
    DefaultDatabase = dbReport
    Left = 236
    Top = 102
  end
  object frxGZipCompressor: TfrxGZipCompressor
    Left = 162
    Top = 30
  end
  object frxDialogControls1: TfrxDialogControls
    Left = 238
    Top = 30
  end
  object qSetReportStart: TpFIBQuery
    Transaction = trStat
    Database = dbReport
    SQL.Strings = (
      
        'insert into USERREPORTSTAT(ID, REPORTCODE, FLAG)values(:stat_id,' +
        ':report_id, 1)')
    Left = 46
    Top = 296
    qoStartTransaction = True
  end
  object qSetReportEnd: TpFIBQuery
    Transaction = trStat
    Database = dbReport
    SQL.Strings = (
      
        'update USERREPORTSTAT us set us.report_end = CURRENT_TIMESTAMP w' +
        'here us.id = :stat_id')
    Left = 46
    Top = 350
    qoStartTransaction = True
  end
  object dsGetReportStatID: TpFIBDataSet
    SelectSQL.Strings = (
      
        'select GEN_ID(GEN_USERREPORTSTAT_ID,1) as stat_id from rdb$datab' +
        'ase;')
    Transaction = trStat
    Database = dbReport
    Left = 48
    Top = 242
    object dsGetReportStatIDSTAT_ID: TFIBBCDField
      FieldName = 'STAT_ID'
      Size = 0
      RoundByScale = True
    end
  end
  object frxPDFExport1: TfrxPDFExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    PrintOptimized = False
    Outline = False
    Background = False
    HTMLTags = True
    Author = 'FastReport'
    Subject = 'FastReport PDF export'
    ProtectionFlags = [ePrint, eModify, eCopy, eAnnot]
    HideToolbar = False
    HideMenubar = False
    HideWindowUI = False
    FitWindow = False
    CenterWindow = False
    PrintScaling = False
    Left = 412
    Top = 32
  end
  object frxHTMLExport1: TfrxHTMLExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    FixedWidth = True
    Background = False
    Centered = False
    EmptyLines = True
    Print = False
    Left = 412
    Top = 86
  end
  object frxXLSExport1: TfrxXLSExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    ExportEMF = True
    AsText = False
    Background = True
    FastExport = True
    PageBreaks = True
    EmptyLines = True
    SuppressPageHeadersFooters = False
    Left = 418
    Top = 136
  end
  object frxRTFExport1: TfrxRTFExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    ExportEMF = True
    Wysiwyg = True
    Creator = 'FastReport'
    SuppressPageHeadersFooters = False
    HeaderFooterMode = hfText
    AutoSize = False
    Left = 414
    Top = 194
  end
  object frxJPEGExport1: TfrxJPEGExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    Left = 416
    Top = 250
  end
  object frxSimpleTextExport1: TfrxSimpleTextExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    Frames = False
    EmptyLines = False
    OEMCodepage = False
    Left = 418
    Top = 308
  end
  object frxCSVExport1: TfrxCSVExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    Separator = ';'
    OEMCodepage = False
    Left = 412
    Top = 360
  end
  object frxTXTExport1: TfrxTXTExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    ScaleWidth = 1.000000000000000000
    ScaleHeight = 1.000000000000000000
    Borders = False
    Pseudogrpahic = False
    PageBreaks = True
    OEMCodepage = False
    EmptyLines = False
    LeadSpaces = False
    PrintAfter = False
    PrinterDialog = True
    UseSavedProps = True
    Left = 418
    Top = 408
  end
  object qInfo: TpFIBDataSet
    SelectSQL.Strings = (
      'select * from user_get_info')
    AllowedUpdateKinds = []
    Transaction = trReport
    Database = dbReport
    Left = 58
    Top = 76
    object qInfoRCODE: TFIBIntegerField
      FieldName = 'RCODE'
    end
    object qInfoRCODE1: TFIBIntegerField
      FieldName = 'RCODE1'
    end
    object qInfoRCODE2: TFIBIntegerField
      FieldName = 'RCODE2'
    end
    object qInfoRCODE3: TFIBIntegerField
      FieldName = 'RCODE3'
    end
    object qInfoRCODE4: TFIBIntegerField
      FieldName = 'RCODE4'
    end
    object qInfoRNAME: TFIBStringField
      FieldName = 'RNAME'
      Size = 25
      EmptyStrToNull = True
    end
  end
  object trReport: TpFIBTransaction
    DefaultDatabase = dbReport
    TimeoutAction = TARollback
    Left = 276
    Top = 168
  end
  object dbReport: TpFIBDatabase
    DBName = 'develop:tash'
    DBParams.Strings = (
      'user_name=plasmorf'
      'password=q1w2e3'
      'sql_role_name=GRAD_ADMIN'
      'lc_ctype=WIN1251')
    DefaultTransaction = trReport
    SQLDialect = 3
    Timeout = 0
    DesignDBOptions = []
    CacheSchemaOptions.LocalCacheFile = 'kassaCashRep'
    CacheSchemaOptions.AutoSaveToFile = True
    CacheSchemaOptions.AutoLoadFromFile = True
    CacheSchemaOptions.ValidateAfterLoad = False
    WaitForRestoreConnect = 0
    Left = 164
    Top = 168
  end
  object dsModuleReports: TpFIBDataSet
    SelectSQL.Strings = (
      'select ur.code as report_id, ur.name as report, current_user'
      'from userreport ur'
      '  join userfrmrpt urp on urp.reportcode = ur.id'
      
        '  join usermodule um on urp.formcode = um.id and um.formcode = :' +
        'form_code'
      'order by 2')
    Transaction = trModuleReports
    Database = dbReport
    Left = 168
    Top = 280
    object dsModuleReportsREPORT_ID: TFIBIntegerField
      FieldName = 'REPORT_ID'
    end
    object dsModuleReportsREPORT: TFIBStringField
      FieldName = 'REPORT'
      Size = 80
      EmptyStrToNull = True
    end
  end
  object frxBarCodeObject1: TfrxBarCodeObject
    Left = 328
    Top = 30
  end
  object trStat: TpFIBTransaction
    DefaultDatabase = dbReport
    TimeoutAction = TARollback
    Left = 48
    Top = 404
  end
  object trModuleReports: TpFIBTransaction
    DefaultDatabase = dbReport
    TimeoutAction = TARollback
    TRParams.Strings = (
      'read'
      'nowait'
      'rec_version'
      'read_committed')
    TPBMode = tpbDefault
    Left = 252
    Top = 349
  end
  object frxCrossObject1: TfrxCrossObject
    Left = 332
    Top = 244
  end
  object frxCheckBoxObject1: TfrxCheckBoxObject
    Left = 340
    Top = 180
  end
  object frxGradientObject1: TfrxGradientObject
    Left = 324
    Top = 120
  end
  object frxDotMatrixExport1: TfrxDotMatrixExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    EscModel = 0
    GraphicFrames = False
    SaveToFile = False
    UseIniSettings = True
    Left = 332
    Top = 300
  end
  object frxChartObject1: TfrxChartObject
    Left = 340
    Top = 368
  end
  object frxRichObject1: TfrxRichObject
    Left = 88
    Top = 24
  end
end
